(perform-replace): Request integers from match-data,

instead of asking for markers and converting them.

diff --git a/lisp/replace.el b/lisp/replace.el
index 205c8508090e95e581eefc8d7a06d8d80feae95a..ed02e0515062fccc42de9f3e41c9a2bcf782a744 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -686,12 +686,7 @@ which will run faster and probably do exactly what you want."
              ;; since lots of markers slow down editing.
              (setq stack
                    (cons (cons (point)
-                               (or replaced
-                                   (mapcar (lambda (elt)
-                                             (and elt
-                                                  (prog1 (marker-position elt)
-                                                    (set-marker elt nil))))
-                                    (match-data))))
+                               (or replaced (match-data t)))
                          stack))))
          (setq lastrepl (point)))
       (replace-dehighlight))